home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Developer Source 17
/
Developer Source Volume 17 (I-MODE Publications, Inc.)(2000).iso
/
delpp
/
fig9-02.gif
< prev
next >
Tile
Graphics Interchange Format
|
1996-11-19
|
35.6 KB
|
640x480
|
4-bit (15 colors)
ocr:
i Delphi 2.0 Paramtst OX File Edit Search View Project Run Component Database Workgroups Tools Help Standard Additional Win95 Dialogs System Data. Access Data Controls - - H A abll OR DE 2 - Form3 L JX Object inspector X Button1: TButton PARAMTSF.PAS -OX Properties Events Paramtsf Cancel False procedure TForm3.ButtoniClick(Sender: TObject); - Caption &Run var Cursor crDefault X,Y: String; - Default True begin DragLursor crDrag x:= Editl.Text; DragMode dmManual Y: : Editl.Text; Enabled True ParamTest(x, Y); +Font (TFont) Memol.Lines.Clear; Height 29 Memol.Lines.Add(x): HelpLontext 0 Memol.Lines ...